Private Sub btnԷ_Click()

    Dim Էġ As Range
    
    If Len(txt̸.Value) > 0 Then
        
        If Len(txt.Value) > 0 Then
    
            Set Էġ = Cells(Rows.Count, "B").End(xlUp).Offset(1)
        
            With Էġ
                .Value = txt̸.Value
                .Offset(, 1).Value = txt.Value
            End With
        
        End If
        
    End If

End Sub